if Msgbox("Would you like to attempt to start the service now?", vbYesNo+vbQuestion) = vbYes then
	Msgbox "Please be patient while the installer attempts to run WMC and MB. " & vbcrlf & "When completed, you will be redirected to the welcome webpage", vbOkonly+vbInformation
	set WshShell = WScript.CreateObject("WScript.Shell")
	Set fso = CreateObject("Scripting.FileSystemObject")
	
	PF = WshShell.ExpandEnvironmentStrings("%PROGRAMFILES(x86)%")
	if fso.Fileexists(PF & "\MediaBrowser\MediaBrowser\MediaBrowserService.exe")  then
		WshShell.Run("""" & PF & "\MediaBrowser\MediaBrowser\MediaBrowserService.exe""""")
	end if
	
	PF = WshShell.ExpandEnvironmentStrings("%PROGRAMFILES%")
	if fso.Fileexists(PF & "\MediaBrowser\MediaBrowser\MediaBrowserService.exe")  then
		WshShell.Run("""" & PF & "\MediaBrowser\MediaBrowser\MediaBrowserService.exe""""")
	end if
	WScript.Sleep 2000
	
	WshShell.Run "%windir%\ehome\ehshell.exe", 2
	WScript.Sleep 8000
	
	WshShell.Run "http://localhost:40600/MediaBrowserService/web/pages/welcome.html" ,9 
	
end if